home *** CD-ROM | disk | FTP | other *** search
/ Sacred & Secular / Sacred and Secular.iso / pc / movies / shared.dir / 05030_Script_Movie Script 3 < prev    next >
Text File  |  1996-04-03  |  9KB  |  266 lines

  1. global firstpan,firstsnd
  2. global currentcast,firstincr,endincr
  3. global spritevis,popuptoggle
  4. global wherefrom,onPics,visicon,timeicon,globeicon,icon
  5. global soundcastno,picloclist2,comingfrom
  6. global vispiclist,grow,gindex,narron,musicon 
  7. global timepiclist1,timepiclist2,timepiclist3,timepiclist4
  8. global guidelist1,guidelist2,guidelist3,guidelist4,guidelist5
  9. global geoorder,visorder,timeorder,sndfilename,sndfileno 
  10. global gskip,frame,frame2
  11. global zoomin,zoomout,zoommask,rplane,lplane,rplanemask,lplanemask
  12. global hand,handmask,glossplaceholder,gGlossUpFrame
  13.  
  14. on hiliteMexico1Pic 
  15.   --  set the visible of sprite 16 to false
  16.   --  set the visible of sprite 17 to false
  17.   set onpics = 0
  18.   set the visible of sprite 17 to rollover(19)
  19.   
  20.   if not rollOver(19) then
  21.     if rollover(6) then moveframe 6,1318,565,129
  22.     else if rollover(7) then moveframe 7,1396,545,133
  23.     else if rollover(8) then moveframe 8,1312,565,128
  24.     else if rollover(10) then moveframe 10,1365,515,182
  25.     else if rollover(13) then moveframe 13,1354,449,191 
  26.     else if rollover(11) then moveframe 11,1346,551,137 
  27.     else if rollover(9) then moveframe 9,1320,575,132          
  28.     else if rollover(12) then moveframe 12,1389,584,140
  29.     else if rollover(14) then movesevframes (0,0,14,565,129,[6,8],2)
  30.     else if rollover(15) then movesevframes (0,0,15,545,133,[7],2)
  31.     else if rollover(20) then movesevframes (0,0,20,515,182,[10],2)
  32.     else if rollover(21) then movesevframes (0,0,21,449,191 ,[13],2)
  33.     else if rollover(22) then movesevframes (0,0,22,551,137 ,[11],2)
  34.     else if rollover(23) then movesevframes (0,0,23,575,132 ,[9],2)
  35.     else if rollover(25) then movesevframes (0,0,25,584,140,[12],2)
  36.   end if
  37.   
  38.   if not onPics then
  39.     checkghostrollover
  40.     set the locH of sprite 2 to -640 
  41.     set the locH of sprite 4 to -640
  42.     set the locH of sprite 5 to -640 
  43.   end if
  44. end hiliteMexPic
  45.  
  46. on hiliteGreece1Pic 
  47.   -- set the visible of sprite 24 to false
  48.   --  set the visible of sprite 16 to false
  49.   --  set the visible of sprite 17 to false
  50.   set onpics = 0
  51.   set chan24 = 0
  52.   
  53.   set the visible of sprite 17 to rollover(19)
  54.   
  55.   if not rollOver(19) then
  56.     if rollover(7) then moveframe 7,1302,459,185
  57.     else if rollover(8) then moveframe 8,1321,431,177
  58.     else if rollover(9) then moveframe 9,1369,487,192
  59.     else if rollover(13) then moveframe 13,1391,543,215
  60.     else if rollover(10) then moveframe 10,1368,431,177    
  61.     else if rollover(6) then moveframe 6,1388,423,196     
  62.     else if rollover(11) then moveframe 11,1347,505,193           
  63.     else if rollover(12) then moveframe 12,1363,458,166 
  64.     else if rollover(15) then movesevframes (0,0,15,459,185,[7],2)
  65.     else if rollover(20) then movesevframes (0,0,20,431,177,[8,10],2)
  66.     else if rollover(21) then movesevframes (0,0,21,487,192,[9],2)
  67.     else if rollover(22) then movesevframes (0,0,22,543,215,[13],2)
  68.     else if rollover(23) then movesevframes (0,0,23,423,196,[6],2)
  69.     else if rollover(25) then movesevframes (0,0,25,505,193,[11],2)
  70.     else if rollover(27) then movesevframes (0,0,27,458,166 ,[12],2)
  71.     else if rollover(14) or rollOver(45) then
  72.       if rollOver(14) then positiontext (1308,0,30)
  73.       set the locH of sprite 4 to 560
  74.       set the locV of sprite 4 to 211
  75.       set the locH of sprite 5 to -640 
  76.       set chan24 = 1
  77.       set onPics = 1
  78.     end if
  79.   end if
  80.   
  81.   set the visible of sprite 24 = chan24
  82.   
  83.   if not onPics then
  84.     checkghostrollover
  85.     set the locH of sprite 2 to -640 
  86.     set the locH of sprite 4 to -640
  87.     set the locH of sprite 5 to -640 
  88.   end if
  89. end hiliteGreecePic
  90.  
  91. on hiliteEgypt1Pic 
  92.   -- set the visible of sprite 24 to false
  93.   --  set the visible of sprite 16 to false
  94.   --  set the visible of sprite 17 to false
  95.   set onpics = 0
  96.   set the visible of sprite 17 to rollover(19)
  97.   set chan24 = 0
  98.   
  99.   if not rollOver(19) then
  100.     if rollover(11) then moveframe 11,1305,473,80
  101.     else if rollover(7) then moveframe 7,1384,469,66
  102.     else if rollover(9) then moveframe 9,1379,471,73
  103.     else if rollover(12) then moveframe 12,1329,518,237   
  104.     else if rollover(14) then moveframe 14,1301,486,274     
  105.     else if rollover(13) then moveframe 13,1367,518,251           
  106.     else if rollover(10) then moveframe 10,1352,512,189
  107.     else if rollover(8) then moveframe 8,1343,446,95
  108.     else if rollover(31) then movesevframes (0,0,31,473,80,[11],2)
  109.     else if rollover(20) then movesevframes (0,0,20,471,73,[9],2)
  110.     else if rollover(27) then movesevframes (0,0,27,518,237,[12],2)
  111.     else if rollover(23) then movesevframes (0,0,23,486,274,[14],2)
  112.     else if rollover(22) then movesevframes (0,0,22,518,251,[13],2)
  113.     else if rollover(25) then movesevframes (0,0,25,512,189,[10],2)
  114.     else if rollover(21) then movesevframes (0,0,21,446,95,[8],2)
  115.     else if rollover(6) then
  116.       positiontext (1300,100,12)
  117.       set the locH of sprite 4 to 469
  118.       set the locV of sprite 4 to 66
  119.       set the locH of sprite 5 to -640 
  120.       set chan24 = 1
  121.       set onPics = 1
  122.     else if rollover(15) then 
  123.       set chan24 = 1
  124.       movesevframes (0,0,15,469,66,[8],2)  
  125.     end if
  126.   end if
  127.   
  128.   set the visible of sprite 24 = chan24
  129.   
  130.   if not onPics then
  131.     checkghostrollover
  132.     set the locH of sprite 2 to -640 
  133.     set the locH of sprite 4 to -640
  134.     set the locH of sprite 5 to -640 
  135.   end if
  136. end hiliteEgyptPic
  137. on hiliteUK1Pic 
  138.   -- set the visible of sprite 24 to false
  139.   --  set the visible of sprite 16 to false
  140.   --  set the visible of sprite 17 to false
  141.   
  142.   set onpics = 0
  143.   set the visible of sprite 17 to rollover(19)
  144.   set chan24 = 0
  145.   
  146.   if not rollOver(19) then
  147.     if rollover(8) then moveframe 8,1387,517,214
  148.     else if rollover(12) then moveframe 12,1317,510,215
  149.     else if rollover(13) then moveframe 13,1381,517,234
  150.     else if rollover(10) then moveframe 10,1395,526,210  
  151.     else if rollover(14) then moveframe 14,1376,517,234      
  152.     else if rollover(11) then moveframe 11,1375,517,234            
  153.     else if rollover(7) then moveframe 7,1315,503,245
  154.     else if rollover(9) then moveframe 9,1314,503,245
  155.     else if rollover(20) then movesevframes (0,0,20,517,214,[8],2)
  156.     else if rollover(21) then movesevframes (0,0,21,510,215,[12],2)
  157.     else if rollover(22) then movesevframes (0,0,22,517,234,[11,13,14],2)
  158.     else if rollover(23) then movesevframes (0,0,23,526,210,[10],2)
  159.     else if rollover(25) then movesevframes (0,0,25,503,245,[7,9],2)
  160.     else if rollover(6) or rollOver(15) then
  161.       if rollOver(6) then positiontext (1333,2,30)
  162.       set the locH of sprite 4 to 490
  163.       set the locV of sprite 4 to 229
  164.       set the locH of sprite 5 to -640 
  165.       set onPics = 1
  166.       set chan24 = 1
  167.     end if
  168.   end if
  169.   
  170.   set the visible of sprite 24 = chan24
  171.   
  172.   
  173.   if not onPics then
  174.     checkghostrollover
  175.     set the locH of sprite 2 to -640 
  176.     set the locH of sprite 4 to -640
  177.     set the locH of sprite 5 to -640 
  178.   end if
  179. end hiliteUKPic
  180.  
  181. on picturetext
  182.   stopQTSound
  183.   sound stop 1
  184.   set holda = currentcast - 300
  185.   set holdb = string(holda)
  186.   
  187.   if the movie <> "BRIDGES.DIR" then
  188.     go (holdb&"text") of movie "BRIDGES.DIR"
  189.   else
  190.     go (holdb&"text") 
  191.   end if    
  192.   
  193.   puppetsprite 2,false
  194.   puppetsprite 4,false
  195.   puppetsprite 7,false
  196.   set the visible of sprite 17 to true
  197.   set the rect of sprite 7 = rect(300,186,743,294)
  198.   set the castnum of sprite 7 to 816
  199.   set the locH of sprite 7 to -640
  200.   --  set the text of field "ENTERTEXT" to ""
  201.   --  set the text of cast "DATA" to ""
  202.   repeat with i = 4 to 8
  203.     set the visible of sprite i to false
  204.   end repeat
  205.   set the visible of sprite 22 to false
  206.   -- dmd set the visible of sprite 16 to false
  207.   set comingfrom = 90
  208. end picturetext
  209.  
  210. on getglossary glossword,placesprite
  211.   global popuptoggle
  212.   
  213.   --
  214.   --
  215.   -- If there is a glossary link up now, clear it, then exit.
  216.   --
  217.   
  218.   if the locH of sprite 3 <> -640 and gGlossUpFrame > 0 and rollOver(3) then
  219.     set the locH of sprite 3 = -640
  220.     set the castnum of sprite 3 = glossplaceholder
  221.     set gGlossUpFrame = 0    
  222.     exit  
  223.   end if
  224.   
  225.   
  226.   --
  227.   --
  228.   -- Handle the find stuff first, rather than a hyperlink that lies 
  229.   -- near or under the find box (DMD)
  230.   --
  231.   -- fix the fact that the mouseline won't work if a higher numbered
  232.   -- element is on top... first must make it invisible, then check mouseline.
  233.   --
  234.   if the visible of sprite 4 then
  235.     if rollOver(6) then
  236.       set s = the clickOn
  237.       set the visible of sprite s = 0
  238.       updateStage
  239.       set mline = the mouseline
  240.       set the visible of sprite s = 1      
  241.       gotoframe mline
  242.       exit  
  243.     else
  244.       exit -- ignore for now
  245.     end if
  246.   else if popUpToggle then exit
  247.   
  248.   
  249.   --if the visible of sprite 3 = false then
  250.   set whatgloss = the castnum of sprite 3
  251.   --put ">>> getGlossary" && whatGloss && glossWord && (whatgloss = glossword)
  252.   
  253.   if whatgloss = glossword then
  254.     set the locH of sprite 3 = -640
  255.     set the castnum of sprite 3 = glossplaceholder
  256.     set gGlossUpFrame = 0
  257.   else
  258.     set the puppet of sprite 3 = 1
  259.     set the castnum of sprite 3 to glossword
  260.     set the locH of sprite 3 = 300
  261.     set the locv of sprite 3 = 200
  262.     set gGlossUpFrame = the frame
  263.   end if
  264.   --end if
  265. end getglossary
  266.